home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 34.zip / BS1 part 34 / Pro-net (final).adf / INIT < prev    next >
Text File  |  2018-01-18  |  1KB  |  46 lines
  1.  
  2. . Initialize data disk
  3. . <file> should be Df0: or Df1: or Dh0:PRO-NET/
  4. . example: execute InitDataDisk df0:
  5. .key file/a
  6. IF <file> EQ DH0:PRO-NET/
  7. MAKEDIR DH0:PRO-NET
  8. else
  9. IF not exists <file>
  10. echo "<file> not found"
  11. QUIT
  12. endif
  13. endif
  14. if not exists <file>PNPOST
  15. MAKEDIR  <file>PNPOST
  16. endif
  17. if not exists <file>PNDIR
  18. MAKEDIR  <file>PNDIR
  19. copy  RAM:DirEmpty to <file>PNDIR/TTL
  20. copy  RAM:DirEmpty to <file>PNDIR/MOS
  21. copy  RAM:DirEmpty to <file>PNDIR/VLSI
  22. copy  RAM:DirEmpty to <file>PNDIR/ECL
  23. copy  RAM:DirEmpty to <file>PNDIR/Analog
  24. copy  RAM:DirEmpty to <file>PNDIR/Discrete
  25. copy  RAM:DirEmpty to <file>PNDIR/MTTL
  26. copy  RAM:DirEmpty to <file>PNDIR/User
  27. copy  RAM:DirEmpty to <file>PNDIR/Symbol
  28. copy  RAM:DirEmpty to <file>PNDIR/Schem
  29. DELETE  RAM:DirEmpty
  30. endif
  31. if not exists <file>PNLIB
  32. MAKEDIR  <file>PNLIB
  33. MAKEDIR  <file>PNLIB/TTL
  34. MAKEDIR  <file>PNLIB/MOS
  35. MAKEDIR  <file>PNLIB/VLSI
  36. MAKEDIR  <file>PNLIB/ECL
  37. MAKEDIR  <file>PNLIB/Analog
  38. MAKEDIR  <file>PNLIB/Discrete
  39. MAKEDIR  <file>PNLIB/MTTL
  40. MAKEDIR  <file>PNLIB/User
  41. MAKEDIR  <file>PNLIB/Symbol
  42. MAKEDIR  <file>PNLIB/Schem
  43. endif
  44. quit
  45.  
  46.